home *** CD-ROM | disk | FTP | other *** search
/ Tux Racer / Tux Racer.iso / program files / Sunspire Studios / Tux Racer / courses / common / courseinit-v60.tcl < prev    next >
Encoding:
Text File  |  2001-05-03  |  660 b   |  35 lines
  1. # Course initialization script
  2. # Sets basic course paramaters before the lighting is set.
  3.  
  4. set cwd [pwd]
  5. tux_goto_data_dir
  6. cd courses/common
  7.  
  8. #
  9. # Lighting
  10. #
  11. set conditions [tux_get_race_conditions]
  12. if { $conditions == "sunny" } {
  13.     source sunny_light.tcl
  14. } elseif { $conditions == "cloudy" } {
  15.     source foggy_light.tcl
  16. } elseif { $conditions == "night" } {
  17.     source night_light.tcl
  18. } 
  19.  
  20.  
  21. source sounds.tcl
  22.  
  23. source terrain_textures.tcl
  24. source terrains.tcl
  25.  
  26. source objects-v60.tcl
  27.  
  28. tux_terrain "$cwd/terrain.png"          ;# bitmap specifying terrain types
  29.  
  30. cd $cwd
  31.  
  32. if [file exists "items.tcl"] {
  33.     source "items.tcl"
  34. }
  35.